home *** CD-ROM | disk | FTP | other *** search
/ Family Forum 262 / SOMC Family Forum 262.iso / SOMC / help.dir / 00001_Start Movie.ls next >
Encoding:
Text File  |  1999-02-16  |  1.4 KB  |  64 lines
  1. on startMovie
  2.   global FINGER, FINGERMASK
  3.   set FINGER to the number of member "Finger1"
  4.   set FINGERMASK to the number of member "Finger2"
  5.   glowClear()
  6. end
  7.  
  8. on glow WHICHSPRITE, TRUEORFALSE
  9.   set the visible of sprite WHICHSPRITE to TRUEORFALSE
  10. end
  11.  
  12. on glowClear
  13.   repeat with i = 50 to 65
  14.     glow(i)
  15.   end repeat
  16. end
  17.  
  18. on textglow WHICHMEMBER, COLORNUMBER
  19.   set the foreColor of member WHICHMEMBER to COLORNUMBER
  20. end
  21.  
  22. on openMIAW MYWINDOW
  23.   set myRect to the rect of window MYWINDOW
  24.   set myStage to the rect of the stage
  25.   set myWidth to getAt(myRect, 3) - getAt(myRect, 1)
  26.   set myHeight to getAt(myRect, 4) - getAt(myRect, 2)
  27.   set myLocH to ((getAt(myStage, 3) + getAt(myStage, 1)) / 2) - (myWidth / 2)
  28.   set myLocV to ((getAt(myStage, 2) + getAt(myStage, 4)) / 2) - (myHeight / 2)
  29.   set myNewRect to rect(myLocH, myLocV, myLocH + myWidth, myLocV + myHeight)
  30.   set the rect of window MYWINDOW to myNewRect
  31.   set the windowType of window MYWINDOW to 2
  32.   open(window MYWINDOW)
  33. end
  34.  
  35. on doRollout numsprite
  36.   glow(numsprite, 0)
  37.   cursor(0)
  38. end
  39.  
  40. on doClick
  41.   puppetSound(1, "clicksound")
  42.   updateStage()
  43. end
  44.  
  45. on timedelay SECONDS
  46.   startTimer()
  47.   repeat while the timer < (SECONDS * 60)
  48.     nothing()
  49.   end repeat
  50. end
  51.  
  52. on doRollover numsprite, SOUNDNUM
  53.   global FINGER, FINGERMASK
  54.   glow(numsprite, 1)
  55.   cursor([FINGER, FINGERMASK])
  56.   updateStage()
  57.   case SOUNDNUM of
  58.     1:
  59.       puppetSound(1, "rollsound")
  60.     2:
  61.       puppetSound(1, "rollsound2")
  62.   end case
  63. end
  64.